home *** CD-ROM | disk | FTP | other *** search
/ Chip 2011 November / CHIP_2011_11.iso / Programy / Inne / Gry / Carnage_Contest / scripts / CC Original / weapons / Anti-Gravity.lua < prev    next >
Encoding:
Text File  |  2010-02-15  |  2.1 KB  |  67 lines
  1. --------------------------------------------------------------------------------
  2. -- Weapon Anti-Gravity
  3. -- Original Carnage Contest Weapon
  4. -- Script by DC, February 2010, www.UnrealSoftware.de
  5. --------------------------------------------------------------------------------
  6.  
  7. -- Setup Tables
  8. if cc==nil then cc={} end
  9. cc.antigravity={}
  10.  
  11. -- Load & Prepare Ressources
  12. cc.antigravity.gfx_wpn=loadgfx("weapons/antigravity.png")                            -- Weapon Image
  13. setmidhandle(cc.antigravity.gfx_wpn)
  14. cc.antigravity.sfx_attack=loadsfx("antigravity.ogg")                                -- antigravity Sound
  15.  
  16. --------------------------------------------------------------------------------
  17. -- Weapon: Anti-Gravity
  18. --------------------------------------------------------------------------------
  19.  
  20. cc.antigravity.id=addweapon("cc.antigravity","Anti-Gravity",cc.antigravity.gfx_wpn,0,2)            -- Add Weapon (0 uses, first in round 2)
  21. cc.antigravity.power=200                                                                        -- Power
  22.  
  23. function cc.antigravity.draw()                                                -- Draw
  24.     -- Partices
  25.     if (weapon_shots>0) and (weapon_shots<cc.antigravity.power) then
  26.         if ((getframe()%5)==0) then
  27.             players=playertable(0,0) -- All living players
  28.             for i=1,#players,1 do
  29.                 particle(p_muzzle,getplayerx(players[i]),getplayery(players[i]))
  30.                 particlesize(0.7,0.7)
  31.                 particlecolor(100,255,255)
  32.                 particlealpha(0.5)
  33.                 particlefadealpha(0.01)
  34.             end
  35.         end
  36.     end
  37. end
  38.  
  39. function cc.antigravity.attack(attack)                                        -- Attack
  40.     if (weapon_shots<=0) then
  41.         if (attack==1) then
  42.             -- No more weapon switching!
  43.             useweapon(0)
  44.             weapon_shots=1
  45.             -- Make sure that there is enough round time
  46.             secondsleft=math.floor(getframesleft()/50)
  47.             changeturntime(30-secondsleft)
  48.             -- Sound
  49.             playsound(cc.antigravity.sfx_attack)
  50.         end
  51.     end
  52.     -- Anti-Gravity
  53.     if (weapon_shots>0) then
  54.         -- End
  55.         if (weapon_shots>=cc.antigravity.power) then
  56.             endturn()
  57.         else
  58.             -- Push Upwards
  59.             players=playertable(0,0) -- All living players
  60.             for i=1,#players,1 do
  61.                 playerpush(players[i],getwind()*3.0,-2.4,1,1)
  62.             end
  63.             -- Count Up
  64.             weapon_shots=weapon_shots+1
  65.         end
  66.     end
  67. end